Net::Blogger::Engine::Slash.pm

aaron of montreal on 2002-05-16T22:57:34

  my $blogger = Net::Blogger->new(engine=>"slash",debug=>1);  
  $blogger->Username(2785);
  $blogger->Password("*****");
  $blogger->Proxy("http://use.perl.org/journal.pl");
  $blogger->Uri("http://use.perl.org/Slash/Journal/SOAP");

  my $postbody = "Hello world\nMy name is Net::Blogger";

  if (! $blogger->newPost(postbody=>$postbody)) {
     die $blogger->LastError();
  }